Top 10k strings from MicroHobby Semanal - Issue 021-024 (1985)(Hobby Press)(es)(Side A).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
6 ;"PARE LA CINTA": 4 i$(q)=f$(x) 4 ;"PULSA ""5""" 4 ;"GANADOR"; 4 );",puntos" 3 F;" ";A$;" ";B$;: 3 ;" GRAFICO EN EJECUCION. ": 3 (A(j)*alto) 3 "COLOR ";c: 2 t(j)=t(j)+(til-tis): 2 inicio+ancho 2 hy,hx;" ": 2 Pulse ""5"" 2 F;" ";A$;" ";B$; 2 ;zx;" c.": 2 ;"TIEMPO:"; 2 ;"SI QUIERE IR AL MENU PULSE 2 ;"PULSE ""5""" 2 ;"PUERTO"; 2 ;"HASTA LA PROXIMA!!": 2 ;"GAME OVER" 2 ;" GRAFICO EN EJECUCION ": 2 ;" ": 2 ;" "; 2 (NPROG/DOS) 2 (A(j)*alto): 2 "DIRECCION INICIAL (hex):"; 2 "22",CERO;B$: 2 2 1 yy6,xx6;" 1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz 8888888888888888888888888888888888888888888888888888888888888888 1 xx6=xx6+.5 1 v(q)=b(x): 1 v(j)=v(j)+1 1 v$(x)=i$(x): 1 v$(q)=f$(x): 1 tr=b(a(x))-(60 1 tanques=tanques-1 1 t(q)=b(x): 1 t$(x)=i$(x): 1 t$(q)=f$(x): 1 s(q)=b(x): 1 s(j)=s(j)+1 1 s$=s$+" ": 1 s$(x)=i$(x): 1 s$(q)=f$(x): 1 record=punt 1 punt=punt+1 1 punt<record 1 n;"RECORDMAN": 1 n$="RECORMAN" 1 n$(f)="ZX SPECTRUM": 1 micro 1 max.)";a$: 1 m(q)=b(x): 1 m(j)=m(j)+3 1 m(j)=m(j)+2 1 m(j)=m(j)+1 1 m$(x)=i$(x): 1 m$(q)=f$(x): 1 l$(x);"=";l(x);",puntos.": 1 l$(q)=i$(x): 1 i(x)=l(x): 1 i(j)=l(j)+h: 1 i(j)=i(j)+h: 1 i$(x)=l$(x): 1 hy,hx;" ": 1 fr)+".00": 1 f$(x)=v$(x): 1 f$(x)=t$(x): 1 f$(x)=s$(x): 1 f$(x)=m$(x): 1 f$(x)=i$(x): 1 div=max/10 1 color=color+1 1 cargador f 1 c$=" ": 1 b(hf)=v(hf): 1 b(hf)=t(hf): 1 b(hf)=s(hf): 1 b(hf)=m(hf): 1 b$=b$+" ": 1 b$=b$+" ": 1 b$=" 1 b$(n)=n$(n)+" 1 a$=a$+" ": 1 Visualiza los resultados en pantalla 1 Vciclista 1 UNO;"PONGA EN MARCHA LA CINTA"; 1 Te la pegaste !!! 1 TZX por Jose Manuel Claros 1 Subrutina para carga de datos 1 Subrutina de introduccion e instrucciones 1 SPACE-UNO,X1 1 SPACE-UNO,CERO: 1 SPACE,LINEA: 1 SPACE,CERO: 1 SI DETIENES EL PROGRAMA PULSA GOTO 15 PARA SEGUIR 1 SEG=SEG-MIN*60 1 SEG;" SEGUNDOS" 1 SACAR CARTA DE LA BARAJA 1 SACAR CARTA CROUPIER 1 Repite o finaliza el programa 1 PopurriMC 1 Parejas 1 PUNTUACION 1 PUNTOS CROUPIER 1 PULSA ""5"" 1 OTRA CARTA? 1 MEDIA=(E(J)+T(K)+F(L))/3 1 Introduccion e instrucciones 1 INSTRUCCIONES 1 INICIALIZACION VARIABLES 1 I,CERO;,,: 1 Hobby Press 1 Graficos 1 Gorila 8 1 Frogger 1 FREC=437500 1 FIN DE JUEGO Y TABLA DE RECORDS 1 FECHA=DIA1+DIA2+DIAS+DD 1 FECHA2=FECHA 1 FECHA1=FECHA 1 F$="0000"+F$ 1 F$="000"+F$ 1 F$="00"+F$ 1 Escribe el error 1 Entrada de nombres y fechas 1 DOS=UNO+UNO 1 DIBUJAR PANTALLA 1 DIA1=AA1*365 1 DATAS DE SONIDO 1 D$="0123456789ABCDEF" 1 Comestar d 1 Castellano 1 Carga matrices de datos 1 Calculo de los dias transcurridos desde principio de siglo 1 Calculo de la posicion relativa de una curva con respecto a la otra 1 Calculo de la posicion de los ciclos en el dia del nacimiento 1 CUANTO APUESTAS? 1 CREACION BARAJA 1 CONTROL APUESTAS 1 COMPATIBILIDADES BIORRITMICAS 1 COLOCACION CARTA CROUPIER 1 COLOCACION 1 CINTA 06 CARA A 1 CERO;" "; 1 CARAA * 1 C$=" Por favor, elija un programa " 1 Blackjack 1 B$=" " 1 Ano bisiesto 1 ="L")-(378 1 ;v$(a(x));"=";b(a(x));",puntos.": 1 ;t$(a(x));"=";g$;",minutos.": 1 ;s$(a(x));"=";b(a(x));",puntos.": 1 ;record*10 1 ;m$(a(x));"=";b(a(x));",puntos.": 1 ;P$;P$;P$;P$;P$;P$ 1 ;P$;P$;P$;P$;P$; 1 ;P$;P$;P$; 1 ;J;" " 1 ;A$;" ": 1 ;A$;" ": 1 ;;"Ganador de la Vuelta por tiempo:"'n$(5 1 ;,,,,,,,,,,,, 1 ;"tanques:": 1 ;"sprints" 1 ;"instruccioneS": 1 ;"YO QUE VOSOTROS ME LO PENSABA ANTES DE CASARME!!": 1 ;"X-eje.": 1 ;"Tu mision es llegar arriba de lapantalla,para ello has de evitar que te cojan los guardianes del reino de los gorilas." 1 ;"TIENES ";pu;" PUNTOS" 1 ;"TE QUEDAN ";l;" `" 1 ;"TE HAS PASADO": 1 ;"TARDARE UNOS ";MIN;" MINUTOS"; 1 ;"SI QUIERE IR AL MENU PULSE N" 1 ;"RECORDS" 1 ;"Puntos=";h;" ";"Tiempo="; 1 ;"Pulse ""5""" 1 ;"Pulsa una tecla para ver las"; 1 ;"Pulsa una tecla para empezar.": 1 ;"Pulsa una tecla para continuar.": 1 ;"Print Rango Save Load"; 1 ;"Por favor teclea tu nombre" 1 ;"PUNTUACION" 1 ;"PUNTOS=0" 1 ;"PUNTOS="; 1 ;"PULSE UNA TECLA": 1 ;"PULSE LA SELECCION QUE DESEE" 1 ;"PULSE I PARA INICIAR EL PROGRAMA Y S PARA SALIR!!" 1 ;"PULSE G PARA GRABAR BITES" 1 ;"PULSE CUALQUIER TECLA." 1 ;"PULSA UNA TECLA": 1 ;"PULSA S PARA INTROD. OTRO M/C"; 1 ;"PULSA O PARA PONER EN MARCHA M/C"; 1 ;"PULSA N PARA REPETIR INTROD.DAT."; 1 ;"PULSA M PARA IR AL MENU"; 1 ;"PARA LA CINTA"; 1 ;"PANTALLAS:";pan 1 ;"Otra partidita S/N ?" 1 ;"OTRA VEZ SERA"; 1 ;"NO SOIS LA PAREJA IDEAL,PERO CASI!!": 1 ;"NO ESTA MAL ";A$; 1 ;"MENU PRINCIPAL" 1 ;"M. Volantes" 1 ;"LO VUESTRO ES ROMEO Y JULIETA!!" 1 ;"LISTO PARA VERIFICAR": 1 ;"JUGAMOS OTRA VEZ": 1 ;"HL:";''"DE:" 1 ;"HL: ";HL; 1 ;"HEX. DEC.": 1 ;"HAS HECHO BLACK-JACK": 1 ;"HAS APOSTADO ";a;" `" 1 ;"Ganador de la Vuelta por puntos:"'n$(1 1 ;"Ganador Sprints Especiales :"'n$(2 1 ;"Ganador Premio de la MONTA 1 ;"Ganador Metas Volantes :"'n$(3 1 ;"GANADOR" 1 ;"FROGGER" 1 ;"FECHA FUERA DEL INTERVALO 1 ENERO 1900-31 DICIEMBRE 1999" 1 ;"Este programa calcula las compatibilidades de una pareja basandose en los ciclos vitales:Emotivo,Intelectual y Fisico (Biorritmos) dando el resultado en % de compatibilidad." 1 ;"Escribe tu nombre a continuacion.Maximo 14 caracteres." 1 ;"Equipo ";i$(j) 1 ;"ETAPA ";r''"Premio de los Sprints Especiales": 1 ;"ETAPA ";r''"Premio de las Metas Volantes": 1 ;"ETAPA ";r''"Clasificacion general por tiempo": 1 ;"ETAPA ";r''" GRAN PREMIO DE LA MONTA 1 ;"ETAPA ";r 1 ;"ESTAIS ROZANDO EL DIVORCIO!!": 1 ;"ESPERA UNOS SEGUNDOS": 1 ;"ESPERA UN MOMENTO" 1 ;"EL CROUPIER SE PLANTA"; 1 ;"EL CROUPIER SE HA PASADO"; 1 ;"DISPONES DE ";l;" `"; 1 ;"DEC. HEX." 1 ;"DEC. HEX.": 1 ;"DE: ";DE; 1 ;"Compatibilidad Intelectual=";T(K);"%" 1 ;"Compatibilidad Fisica =";F(L);"%" 1 ;"Compatibilidad Emocional =";E(J);"%" 1 ;"Color Enter Tit. Menu" 1 ;"CUANTO APUESTAS?" 1 ;"COMPATIBILIDADES" 1 ;"COMPATIBILIDADES BIORRITMICAS DE" 1 ;"COMO PAREJA VAIS DE MEDIOCRES POR LA VIDA!!": 1 ;"COMANDOS"; 1 ;"BUENA SUERTE !!!!": 1 ;"ANTES TENIAS ";g;" `" 1 ;"?OTRA CARTA?"; 1 ;"?OTRA APUESTA?"; 1 ;"8=DERECHA"; 1 ;"7=ARRIBA "; 1 ;"6=ABAJO "; 1 ;"6/ VOLVER AL BASIC." 1 ;"5=IZQUIERDA"; 1 ;"5/ CAMBIO DE GRAFICO."; 1 ;"4/ 3D-GRAFICO."; 1 ;"3/ AMBOS GRAFICOS."; 1 ;"2/ GRAFICO LINEAL."; 1 ;"1/ GRAFICO DE BARRAS."; 1 ;"1-CONVERSION DEC-HEX."''"2-CONVERSION HEX-DEC."''"3-TRADUCCION SONIDOS A M/C." 1 ;"1 al menos pero menos de 13": 1 ;"0=SALTAR" 1 ;".tiempo." 1 ;".puntos." 1 ;"**TECLAS DE MANEJO**"; 1 ;"***SUPER COCO***" 1 ;"************" 1 ;"( ";DIO2;"/";MOS2;"/";AN2;" )")'"Todo correcto (s,n)? "; 1 ;"( ";DIO2;"/";MOS2;"/";AN2;" )" 1 ;"( ";DIO1;"/";MOS1;"/";AN1;" )"'B$; 1 ;"( ";DIO1;"/";MOS1;"/";AN1;" )" 1 ;"!HEMOS EMPATADO!"; 1 ;" Vuelta Ciclista al ZX SPECTRUM"''" Inscripciones"''"Numero de etapas y equipos" 1 ;" Solo podras utilizar tu habili-dad saltarina cuando te encuen- tres frente a un agujero.": 1 ;" Pulsa una tecla para continuar " 1 ;" PARA LA CINTA " 1 ;" MALA SUERTE "; 1 ;" LASTIMA QUE SE ACABO "; 1 ;" Has logrado mejorar un record."; 1 ;" Duracion etapa=";16 1 ;" CROUPIER ";pc 1 ;" CONVERSION HEXADECIMAL-DECIMAL" 1 ;" CONVERSION DECIMAL-HEXADECIMAL"; 1 ;" BLACK JACK "; 1 ;" BLACK JACK " 1 ;" NO TIENES ";a;" ` ": 1 ;" Final de la Vuelta Ciclista"'" Resultados"'' 1 ;" Cada division Y= ";div;" ";a$(1 1 ;" SI/NO " 1 ;" ?OTRA PARTIDA? "; 1 ;" !!ENHORABUENA!! "; 1 ;" PULSE LA OPCION DESEADA. " 1 ;" PULSE LA OPCION DESEADA ": 1 ;" INVALIDO (VALOR NEGATIVO) ": 1 ;" SI/NO "; 1 ;" GRABACION EFECTUADA. ": 1 ;" ";; 1 ;" GRAFICO EN EJECUCION " 1 ;" !PERDISTE! ": 1 ;" !GANASTE! ": 1 ;" Si o No " 1 ;" CARGA EFECTUADA ": 1 ;" "; 1 ;" QUIERES JUGAR? " 1 ;" FUERA DE RANGO ": 1 ;" "; 1 ;" ": 1 ;" "; 1 ;" " 1 ;" "; 1 ;" " 1 ;" " 1 /T*tanques) 1 /(HL+30.125 1 -n,p;" "; 1 ,D.L.: M-36598-84 1 *d;" cuadros" 1 *** CINTA-MICROHOBBY *** 1 );"=";g$;",minutos" 1 )-A(j))*alto) 1 )*alto)+16 1 )*(ancho+4 1 )*(ancho+14 1 (til-tis);",segundos": 1 (tanques-4 1 (t+tr)+"0": 1 (inicio+ancho+4 1 (inicio+ancho+2 1 (inicio+ancho),16 1 (fr+tr)+"0": 1 (b(a(x))/60 1 (VALOR)<"A" 1 (POST1-POST2)+1 1 (POSF1-POSF2)+1 1 (POSE1-POSE2)+1 1 (FREC*SEC+.5 1 (FECHA2/33 1 (FECHA2/28 1 (FECHA2/23 1 (FECHA1/33 1 (FECHA1/28 1 (FECHA1/23 1 ((A(j)*alto)+20 1 (((FECHA2/33 1 (((FECHA2/28 1 (((FECHA2/23 1 (((FECHA1/33 1 (((FECHA1/28 1 (((FECHA1/23 1 '"Clasificacion general por puntos": 1 '"4-ANALISIS PROGRAMA M/C."''"5-INTRODUCCION PROGRAMA M/C."''"6-CARGAR BITES."''"7-MOVER BYTES EN MEMORIA." 1 '" Las REGLAS DEL JUEGO son: -Black Jack consiste en conse-guir 21 puntos con las dos pri-meras cartas. -las figuras valen 10 puntos. -el AS vale 11 en las dos pri-meras cartas menos para el crou-pier, que siempre le vale 11." 1 '" El juego consiste en aproximar-te a 21 puntos, sin pasarte, encuyo caso pierdes lo apostado. A continuacion el croupier haralo mismo, con la ventaja de quese plantara cuando te supere." 1 "black jack" 1 "b"+n),240 1 "a"+n),255 1 "VERIFICAR: REBOBINE" 1 "UNIDADES Y(4 1 "Tu Nombre?"; 1 "Titulo ? ";b$: 1 "TIEMPO EN SEGUNDOS:";SEC 1 "SUPER COCO" 1 "SPRINT","M.VOLANTE","MONTA 1 "SINO PULSE OTRA TECLA": 1 "SI QUIERE VARIAR EL RAMTOP PULSE S": 1 "SI QUIERE CARGAR LOS BYTES EN ALGUNO DIRECCION ESPECIAL PULSE:"' 1 "QUE GRAFICO PREFIERES ? ";opcion: 1 "Pulsa ENTER para empezar ";a$: 1 "PULSE UNA TECLA": 1 "PULSE N PARA ABANDONAR"'"PULSE S PARA PARAR" 1 "Numero de datos.";A(20 1 "Nombre de tu pareja?"; 1 "NOTA BASIC (DESDE -12 HASTA 40):"'HL 1 "NOMBRE:"; 1 "NOMBRE DEL JUGADOR="; 1 "NOMBRE ? ";b$: 1 "NOMBRE ? ";b$: 1 "MicroHobby Semanal numeros 21 a 24 1 "Max.10 letras "; 1 "LONGITUD(hex):"; 1 "LONGITUD (hex):"; 1 "GRAFICOS" 1 "Fecha de nacimiento"'"AA?";AA: 1 "Fecha de nacimiento de tu pareja";"AA?";AA: 1 "Etapas ? ";etapa 1 "Equipos ? ";pa 1 "ESTAS SEGURO? (s/n) ";s$: 1 "EL COMEDOR DE ESTRELLAS ES UNA PLANTA QUE COMO SU NOMBRE INDICACOME ESTRELLAS Y SU VIDA ES DE UNOS CIEN SEGUNDOS"''"TIENES PUES ESE TIEMPO PARA MA- NEJAR TU PLANTA Y COMER EL MAXI-MO NUMERO DE ESTRELLAS "''"LAS ETRELLAS QUE NO COJAS CON ELCENTRO DE LA BOCA NO SERAN DEVO-RADAS CUANDO COMAS UNA ESTRELLA SONARA UN PITIDO DE CONFIRMACION"'''"O-IZQUIERDA"'"P-DERECHA"'"1-COMER" 1 "E-Frogger","F-Parejas","G-Gorila","H-Vciclista" 1 "Desea copia por impresora (s,n)?"; 1 "Desea alguna otra compatibilidad(s,n)?"; 1 "DIRECCION TABLA(hex):"; 1 "DIRECCION NUEVA(hex):"; 1 "DIRECCION INICIO (hex):"; 1 "DIRECCION FINAL (hex):"; 1 "DIRECCION ESPECIAL:";DS: 1 "DIRECCION COMIENZO (hex):"; 1 "DATOS (hex):"; 1 "DATO = ";A(i): 1 "COLOR DE LA PRIMERA BARRA ? ";c: 1 "ALGUNO MAS?:(S/N)";F$: 1 "A-Graficos","B-Blackjack","C-Comestar","D-PopurriMC" 1 "A","2","3","4","5","6","7","8","9"," 1 "64"+NPROG) 1 "5";"cara: "; 1 "5";"Programa: "; 1 "5";"Programa inexistente": 1 "5";"'R' Vuelve al menu" 1 "5";"'L' Carga el programa"; 1 "32"-I;C$( 1 "22",CERO;C$(I 1 "22",CERO;B$ 1 "22",CERO; 1 ","J","Q","K" 1 " -el croupier no se puede plan-tar antes de 17 puntos. Tu si. Empiezas con 1000 `. A ver concuantas acabas." 1 " "; 1 by E. Sainz" 1 Vuelta Ciclista al ZX Spectrum Patrocinada por Micro Hobby 1 VARIABLES 1 RICARDO DE PRADO 1984: 1 F R A N C I S C O O R C E R A" 1 1